home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 2 / The Arsenal Files 2 (Arsenal Computer).ISO / health / jaws231d.exe / INSTALL.DAT < prev    next >
Text File  |  1994-06-06  |  48KB  |  1,139 lines

  1. /****************************************************************************
  2. *   This file is protected by copyright (C) 1989-1994 by Henter-Joyce, Inc. * 
  3. *                          All rights reserved.                             *
  4. *                                                                           *
  5. *      Description: Installation script for use with Knowledge Dynamics'    *
  6. *                   Install program.                                        *
  7. *                                                                           *
  8. *         Revision: 3.3                                                     *
  9. *             Date: March 24, 1994                                          *
  10. *           Author: Jeff Belina                                             *
  11. *            State: Modifications for JAWS 2.3 Beta2 Installation           *
  12. *            Notes: Added startup message "turn off smart screen"           *
  13. *                   Made SET WP=/ND unconditional, Added SYNTH4 on          *
  14. *                   "EXTRA SYNTH DISK", also add WP6.0 configs              *
  15. *                   Added Support for 3.5" HD disks                         *
  16. *                                                                           *
  17. *         Revision: 3.4
  18. *           Author: Jeff Belina                                             *
  19. *            State: Modifications for JAWS 2.31 Installation                *
  20. *            Notes: Changes for WP51 and WP60 installations and new files   *
  21. *                                                                           *
  22. *****************************************************************************/
  23.  
  24. @DefineProject
  25.         @Name = "JAWS"
  26.         @Version = "2.31"
  27.         @Outdrive = C
  28.         @Subdir = "\\"
  29.         @InDiskBell = 1
  30.         @Terse
  31. @EndProject
  32.  
  33. /* Opening Screen */
  34. @Display
  35.         @Cls
  36.  
  37. @If (!@Exists "@InDrive:Register.exe")
  38.                          Update and Demonstration
  39. @EndIf
  40.                          Installation Procedure for
  41.                                Henter-Joyce's
  42.                               JAWS version @Version
  43.             JAWS is Copyright (C) 1989-1994 by Henter-Joyce, Inc.
  44.  
  45.         The installation process is virtually automatic with the
  46.         exception of a few simple selections.  To interrupt and quit
  47.         the installation process at any time press the Escape key,
  48.         followed by the Enter key.  Otherwise press any key to continue.
  49.  
  50.         If you are using JAWS to install this update please turn off
  51.         Smart Screens now.  To do this press INSERT+S and you should
  52.         hear JAWS say Smart Screens OFF.
  53.  
  54.                                   @Pause
  55.  
  56. @EndDisplay
  57.  
  58. /* Check to see if running DOS 3.0 or higher */
  59. @Display
  60.         @Cls
  61.         @If (@OSMajor < 3)
  62.         JAWS version @Version REQUIRES PC or MS DOS Version 3.0 or
  63.         higher to function properly.  Please obtain a new version of
  64.         DOS, upgrade your computer system and then restart the JAWS
  65.         installation procedure.  Press the Enter key to return to DOS.
  66.  
  67.                                   @Pause
  68.         @Exit
  69.         @EndIf
  70. @EndDisplay
  71.  
  72. /* Desktop or Toshiba */
  73. @GetOption
  74.         @LocalWindow(16,39)
  75.         @Cls
  76.  
  77.         JAWS needs to know the type of keyboard you are working with.
  78.  
  79.         If you are using a Toshiba laptop computer without a numeric
  80.         pad select the "Toshiba" option.
  81.  
  82.         If you are using a Desktop keyboard with a numeric pad, or a
  83.         Toshiba keyboard with a built-in or optional numeric keypad,
  84.         select the "Desktop" option.
  85.  
  86.         Press the Enter key to select the "Desktop" option, or use the
  87.         Down Arrow key to move the bar to the "Toshiba" option and then
  88.         press the Enter key.
  89.  
  90.         @Option 300 = "Desktop"
  91.         @Option 301 = "Toshiba"
  92. @EndOption
  93.  
  94. @DefineVars
  95.         @If (300 [= @Option)
  96.                 @Qstring @Computer = "Desktop"
  97.         @ElseIf (301 [= @Option)
  98.                 @Qstring @Computer = "Toshiba"
  99.         @EndIf
  100. @EndVars
  101.  
  102. ChooseDrive:
  103.  
  104. /* Choose Drive */
  105. @GetOutDrive
  106.         @LocalWindow(14,39)
  107.         @Cls
  108.         On which disk drive do you wish to install JAWS?
  109.  
  110.         Press the Enter key to install to Drive C. Otherwise, Use the
  111.         Up Arrow and Down Arrow keys to move the bar to the disk drive
  112.         you wish to install to and then press the Enter key.
  113.  
  114. @EndOutDrive
  115.  
  116.  
  117. /* Chose Directory */
  118. @If (@Removable == 0)
  119.      @DefineVars
  120.                 @Dir @JDir = "JAWS"
  121.      @EndVars
  122.  
  123.      @GetSubdir @JDir
  124.         @PROMPT = " Which directory? "
  125.         @LocalWindow(15,40)
  126.         @CLS
  127.  
  128.         Now you need to specify the destination directory where the
  129.         JAWS system will be installed.
  130.  
  131.         We highly recommend you install JAWS to a directory named \JAWS.
  132. @If (900 [! @Option)        This is what the installation program will default to. @Endif
  133.         This will make things easier for all involved in the event you
  134.         ever need technical support for JAWS from Henter-Joyce.
  135.  
  136.         Press the Enter key to name the directory @JDir, or edit the
  137.         directory below using the arrow, delete, letter and number keys.
  138.      @EndSubdir
  139. @Else
  140.         @DefineVars
  141.                 @Dir @JDir = ""
  142.         @EndVars
  143. @Endif
  144.  
  145.  
  146. /* check for existing JAWS env. & voice files */
  147. @If (@Exists "@OutDrive:\\@JDir\\*.JEF"||@Exists "@OutDrive:\\@JDir\\*.JVF")
  148.  
  149.         @Display
  150.         @Cls
  151.         We noticed that there is already a version of JAWS in the
  152.         directory you have selected.  We recommend that you stop
  153.         the installation now, back up the already existing files onto
  154.         a floppy disk or copy them into another directory, delete
  155.         them from the selected directory, and then run install again.
  156.         You may exit install by pressing the Escape key and the Enter
  157.         key at this time. You can run J_CVT23.EXE at any time to convert
  158.         configuration files that have been backed up to the new JAWS
  159.         format which began with JAWS 2.3.
  160.  
  161.         If you proceed with this installation we will convert the
  162.         relevant files to a 2.3 format.  You may lose any configuration
  163.         files (macros, frames, environment, voice, or dictionary) that
  164.         you have created or modified, because the installation program
  165.         will install new versions of some of these files.  That is why
  166.         it is wise to have a back up.  Press any key to continue the
  167.         installation, or press the Escape key and the Enter key to exit.
  168.                                   @Pause
  169.         @EndDisplay
  170. @Spawn("j_cvt23 @OutDrive:\\@JDir /I")      /* /I stands for install       */
  171. @Endif
  172.  
  173. ChooseSynth:
  174. @FlushGroups
  175.  
  176. /* Chose Synthesizer */
  177. @GetGroups
  178. @LocalWindow(16,39)
  179.         @CLS
  180.         Which Synthesizer are you using?
  181.  
  182.         Use the Up Arrow and Down Arrow keys to move the bar to the
  183.         synthesizer you wish to install and then press the Enter key.
  184.         The list will scroll to reveal more synthesizers when you
  185.         reach the bottom.
  186.  
  187.         @Set A = "Accent Mini or Toshiba"
  188.         @Set B = "Accent P C"
  189.         @Set C = "Accent S A"
  190.         @Set M = "Aicom Messenger I C"
  191.         @Set D = "Audapter"
  192.         @Set E = "Braille 'N Speak 640 with indexing"
  193.         @Set Y = "Braille 'N Speak & Braille Blazer without indexing"
  194.         @Set F = "DECtalk & MultiVoice & Kurzweil Personal Reader"
  195.         @Set G = "DECtalk P C"
  196.         @Set H = "Double Talk Internal or External"
  197.         @Set I = "Echo Internal Card"
  198.         @Set J = "Echo External (New)"
  199.         @Set Z = "Echo External (Old)"
  200.         @Set L = "Lite Talk"
  201.         @Set N = "Prose 4000"
  202.         @Set P = "Sounding Board"
  203.         @Set Q = "Synphonix (all models) & Votalker"
  204.         @Set R = "Braille Mate"
  205.         @Set S = "Xerox (Kurzweil) Reading Edge"
  206. @If (@Exists "extra.dsk")
  207.         @Set T = "External Apollo II (EXTRA DISK)"
  208. //      @Set U = "Internal Apollo (Not Available yet)"
  209.         @Set V = "External Infovox   (EXTRA DISK)"
  210.         @Set W = "Internal Infovox   (EXTRA DISK)"
  211.         @Set X = "SoundBlaster       (EXTRA DISK)"
  212. @Endif
  213. @EndGroups
  214.  
  215. /* Define variables for each synthesizers' name (JName) and
  216.  * executable file (Exec) for use in messages to the user and in batch
  217.  * file creation. */
  218. @DefineVars
  219.         @If ('A' [= @Group)
  220.                 @Qstring @Exec = "J_ACNTPC"
  221.                 @Qstring @JName = "Accent Mini"
  222.                 @Qstring @ExtraFiles = "SPKEMS.DVC"
  223.                 @Qstring @NeedCom = "No"
  224.                 @Qstring @NeedLpt = "No"
  225.         @ElseIf ('B' [= @Group)
  226.                 @Qstring @Exec = "J_ACNTPC"
  227.                 @Qstring @JName = "Accent P C"
  228.                 @Qstring @ExtraFiles = "SPKACNT.DVC"
  229.                 @Qstring @NeedCom = "No"
  230.                 @Qstring @NeedLpt = "No"
  231.         @ElseIf ('C' [= @Group)
  232.                 @Qstring @Exec = "J_ACNTSA"
  233.                 @Qstring @JName = "Accent S A"
  234.                 @Qstring @ExtraFiles = " "
  235.                 @Qstring @NeedCom = "Yes"
  236.                 @Qstring @NeedLpt = "No"
  237.         @ElseIf ('M' [= @Group)
  238.                 @Qstring @Exec = "J_ACNTPC"
  239.                 @Qstring @JName = "Messenger I C"
  240.                 @Qstring @ExtraFiles = "SPKMIC.DVC"
  241.                 @Qstring @NeedCom = "No"
  242.                 @Qstring @NeedLpt = "No"
  243.         @ElseIf ('D' [= @Group)
  244.                 @Qstring @Exec = "J_AUDAPT"
  245.                 @Qstring @JName = "Audapter"
  246.                 @Qstring @ExtraFiles = " "
  247.                 @Qstring @NeedCom = "Yes"
  248.                 @Qstring @NeedLpt = "No"
  249.         @ElseIf ('E' [= @Group || 'Y' [= @Group)
  250.                 @Qstring @Exec = "J_BNS"
  251.                 @Qstring @JName = "Braille 'N Speak"
  252.                 @Qstring @ExtraFiles = " "
  253.                 @Qstring @NeedCom = "Yes"
  254.                 @Qstring @NeedLpt = "No"
  255.         @ElseIf ('F' [= @Group)
  256.                 @Qstring @Exec = "J_DECTLK"
  257.                 @Qstring @JName = "DECtalk"
  258.                 @Qstring @ExtraFiles = " "
  259.                 @Qstring @NeedCom = "Yes"
  260.                 @Qstring @NeedLpt = "No"
  261.         @ElseIf ('G' [= @Group)
  262.                 @Qstring @Exec = "J_DECPC"
  263.                 @Qstring @JName = "DECtalk PC"
  264.                 @Qstring @ExtraFiles = " "
  265.                 @Qstring @NeedCom = "No"
  266.                 @Qstring @NeedLpt = "No"
  267.         @ElseIf ('H' [= @Group)
  268.                 @Qstring @Exec = "J_DOUBLE"
  269.                 @Qstring @JName = "Double Talk"
  270.                 @Qstring @ExtraFiles = " "
  271.                 @Qstring @NeedCom = "No"
  272.                 @Qstring @NeedLpt = "No"
  273.         @ElseIf ('I' [= @Group)
  274.                 @Qstring @Exec = "J_ECHO"
  275.                 @Qstring @JName = "Echo Internal Card"
  276.                 @Qstring @ExtraFiles = "ECHOPCII.COM and/or TALK.EXE"
  277.                 @Qstring @NeedCom = "No"
  278.                 @Qstring @NeedLpt = "No"
  279.         @ElseIf ('J' [= @Group)
  280.                 @Qstring @Exec = "J_ECHO"
  281.                 @Qstring @JName = "Echo External"
  282.                 @Qstring @ExtraFiles = " "
  283.                 @Qstring @NeedCom = "Yes"
  284.                 @Qstring @NeedLpt = "No"
  285.         @ElseIf ('Z' [= @Group)
  286.                 @Qstring @Exec = "J_ECHOXT"
  287.                 @Qstring @JName = "Echo External"
  288.                 @Qstring @ExtraFiles = " "
  289.                 @Qstring @NeedCom = "Yes"
  290.                 @Qstring @NeedLpt = "No"
  291.         @ElseIf ('L' [= @Group)
  292.                 @Qstring @Exec = "J_DOUBLE"
  293.                 @Qstring @JName = "LiteTalk"
  294.                 @Qstring @ExtraFiles = " "
  295.                 @Qstring @NeedCom = "Yes"
  296.                 @Qstring @NeedLpt = "No"
  297.         @ElseIf ('N' [= @Group)
  298.                 @Qstring @Exec = "J_PROSE"
  299.                 @Qstring @JName = "Prose 4000"
  300.                 @Qstring @ExtraFiles = " "
  301.                 @Qstring @NeedCom = "No"
  302.                 @Qstring @NeedLpt = "No"
  303.         @ElseIf ('P' [= @Group)
  304.                 @Qstring @Exec = "J_SB"
  305.                 @Qstring @JName = "Sounding Board"
  306.                 @Qstring @ExtraFiles = "SBLOAD.COM and SB.COM"
  307.                 @Qstring @NeedCom = "No"
  308.                 @Qstring @NeedLpt = "No"
  309.         @ElseIf ('Q' [= @Group)
  310.                 @Qstring @Exec = "J_SONIX"
  311.                 @Qstring @JName = "Symphonix or Votalker"
  312.                 @Qstring @ExtraFiles = "SONIXTTS.COM or both the files SONIX.COM and TTS.COM"
  313.                 @Qstring @NeedCom = "No"
  314.                 @Qstring @NeedLpt = "No"
  315.         @ElseIf ('R' [= @Group)
  316.                 @Qstring @Exec = "J_SB"
  317.                 @Qstring @JName = "Braille Mate"
  318.                 @Qstring @ExtraFiles = " "
  319.                 @Qstring @NeedCom = "Yes"
  320.                 @Qstring @NeedLpt = "No"
  321.         @ElseIf ('S' [= @Group)
  322.                 @Qstring @Exec = "J_KRE"
  323.                 @Qstring @JName = "K Reading Edge"
  324.                 @Qstring @ExtraFiles = " "
  325.                 @Qstring @NeedCom = "Yes"
  326.                 @Qstring @NeedLpt = "No"
  327.         @ElseIf ('T' [= @Group)
  328.                 @Qstring @Exec = "J_APOLXT"
  329.                 @Qstring @JName = "Apollo External"
  330.                 @Qstring @ExtraFiles = " "
  331.                 @Qstring @NeedCom = "Yes"
  332.                 @Qstring @NeedLpt = "No"
  333.         @ElseIf ('U' [= @Group)
  334.                 @Qstring @Exec = "J_APOLPC"
  335.                 @Qstring @JName = "Apollo Internal"
  336.                 @Qstring @ExtraFiles = "?"
  337.                 @Qstring @NeedCom = "No"
  338.                 @Qstring @NeedLpt = "No"
  339.         @ElseIf ('V' [= @Group)
  340.                 @Qstring @Exec = "J_VOXXT"
  341.                 @Qstring @JName = "Infovox External"
  342.                 @Qstring @ExtraFiles = " "
  343.                 @Qstring @NeedCom = "Yes"
  344.                 @Qstring @NeedLpt = "No"
  345.         @ElseIf ('W' [= @Group)
  346.                 @Qstring @Exec = "J_VOXPC"
  347.                 @Qstring @JName = "Infovox Internal"
  348.                 @Qstring @ExtraFiles = " "
  349.                 @Qstring @NeedCom = "No"
  350.                 @Qstring @NeedLpt = "No"
  351.         @ElseIf ('X' [= @Group)
  352.                 @Qstring @Exec = "J_SBLAST"
  353.                 @Qstring @JName = "Sound Blaster"
  354.                 @Qstring @ExtraFiles = "SBTALK.EXE"
  355.                 @Qstring @NeedCom = "No"
  356.                 @Qstring @NeedLpt = "No"
  357.         @EndIf
  358. @EndVars
  359.  
  360. @If ("Yes" == "@NeedLpt")
  361.         @If (@LptTotal == 0)
  362.         @Display
  363.         @Cls
  364.         The JAWS installation program could not locate a Parallel
  365.         Printer port on your computer.  The synthesizer you've
  366.         selected, the @JName, requires a parallel port to connect
  367.         to your computer. If you selected this synthesizer in error,
  368.         rerun the installation program and make a new choice.  If the
  369.         @JName is the synthesizer you are trying to run, you will need
  370.         to exit the installation program, check your hardware, and
  371.         restart the installation process.
  372.                                   @Pause
  373.         @Exit
  374.         @EndDisplay
  375.         /* If only one LPT port, skip selection box */
  376.         @ElseIf (@LptTotal == 1)
  377.                 @If (@Lpt (1))
  378.                         @SetOption(61)
  379.                 @ElseIf (@Lpt (2))
  380.                         @SetOption(62)
  381.                 @ElseIf (@Lpt (3))
  382.                         @SetOption(63)
  383.                 @EndIf
  384.         /* If more than one parallel port, bring up selection box for how
  385.          * ever many there are, up to four */
  386.         @ElseIf (@LptTotal > 1)
  387.                 @GetOption
  388.                 @LocalWindow(16,39)
  389.                 @Cls
  390.         The Installation program has detected @LptTotal Parallel Printer ports.
  391.  
  392.         Which port do you wish to set up the @JName
  393.         synthesizer to work with?
  394.  
  395.         Use the Up Arrow and Down Arrow keys to move the bar to the
  396.         parallel port you wish to install to and then press the Enter key.
  397.  
  398.                 @If (@Lpt(1))
  399.                         @Option 61 = "LPT1"
  400.                 @EndIf
  401.                 @If (@Lpt(2))
  402.                         @Option 62 = "LPT2"
  403.                 @EndIf
  404.                 @If (@Lpt(3))
  405.                         @Option 63 = "LPT3"
  406.                 @EndIf
  407.                 @EndOption
  408.         @EndIf
  409.  
  410.         @DefineVars
  411.                 @If (61 [= @Option)
  412.                         @Qstring @LptPort = "LPT1"
  413.                 @ElseIf (62 [= @Option)
  414.                         @Qstring @LptPort = "LPT2"
  415.                 @ElseIf (63 [= @Option)
  416.                         @Qstring @LptPort = "LPT3"
  417.                 @EndIf
  418.         @EndVars
  419. @Else
  420.         @DefineVars
  421.                 @Qstring @LptPort = " "
  422.         @EndVars
  423. @EndIf
  424.  
  425.  
  426. /* Check for total number of serial ports and select one for use with
  427.  * the Accent SA, the Braille N' Speak, the Audapter, the Echo XT, the
  428.  * DECtalk, the Kurzweil, or the MultiVoice.
  429.  */
  430. @If ("Yes" == "@NeedCom")
  431.         @If (@ComTotal == 0)
  432.         @Display
  433.         @Cls
  434.         The JAWS installation program could not locate a serial port
  435.         on your computer.  The synthesizer you've selected, the @JName,
  436.         requires a serial port to connect to your computer. If you
  437.         selected this synthesizer in error, rerun the installation
  438.         program and make a new choice.  If the @JName is the synthesizer
  439.         you are trying to run, you will need to exit the installation
  440.         program, check your hardware, and restart the installation process.
  441.  
  442.                                   @Pause
  443.         @Exit
  444.         @EndDisplay
  445.         /* If only one com port, skip selection box */
  446.         @ElseIf (@ComTotal == 1)
  447.                 @If (@Com (1)) @SetOption(51)
  448.                 @ElseIf (@Com (2)) @SetOption(52)
  449.                 @ElseIf (@Com (3)) @SetOption(53)
  450.                 @ElseIf (@Com (4)) @SetOption(54)
  451.                 @EndIf
  452.         /* If more than one comm port, bring up selection box for how
  453.          * ever many there are, up to four */
  454.         @ElseIf (@ComTotal > 1)
  455.                 @GetOption
  456.                 @LocalWindow(13,39)
  457.                 @Cls
  458.         The Installation program has detected @ComTotal Serial ports.
  459.  
  460.         Which serial port do you wish to set up the @JName
  461.         synthesizer to work with?
  462.  
  463.         Use the Up Arrow and Down Arrow keys to move the bar to the
  464.         serial port you wish to install to and then press the Enter key.
  465.  
  466.                 @If (@Com (1))
  467.                         @Option 51 = "Com1"
  468.                 @EndIf
  469.                 @If (@Com (2))
  470.                         @Option 52 = "Com2"
  471.                 @EndIf
  472.                 @If (@Com (3))
  473.                         @Option 53 = "Com3"
  474.                 @EndIf
  475.                 @If (@Com (4))
  476.                         @Option 54 = "Com4"
  477.                 @EndIf
  478.                 @EndOption
  479.         @EndIf
  480.  
  481.         @DefineVars
  482.                 @If (51 [= @Option)
  483.                         @Qstring @ComPort = "COM1"
  484.                 @ElseIf (52 [= @Option)
  485.                         @Qstring @ComPort = "COM2"
  486.                 @ElseIf (53 [= @Option)
  487.                         @Qstring @ComPort = "COM3"
  488.                 @ElseIf (54 [= @Option)
  489.                         @Qstring @ComPort = "COM4"
  490.                 @EndIf
  491.         @EndVars
  492. @Else
  493.         @DefineVars
  494.                 @Qstring @ComPort = " "
  495.         @EndVars
  496. @EndIf
  497.  
  498. @GetOption
  499.         @LocalWindow(18,39)
  500.         @SetOption(1)
  501.         @SetOption(2)
  502.         @SetOption(3)
  503.         @SetOption(4)
  504.         @SetOption(5)
  505.         @SetOption(6)
  506.         @SetOption(7)
  507.         @SetOption(8)
  508.         @CheckBox
  509.         @Cls
  510.         Do you wish to install the JAWS manual and any of the
  511.         following companion files for JAWS to work in conjuction
  512.         with Word Perfect, Lotus 1-2-3, Professional Write and
  513.         other application programs?
  514.  
  515.         If you wish to install all the selections, simply press the
  516.         Enter key.  If not, use the Up Arrow and Down Arrow keys to
  517.         move the bar to the groups you do not wish to install and
  518.         then press the Space Bar to toggle the option from "Yes" to
  519.         "No".  The bar will advance to the next line automatically.
  520.         Press the Enter key when you have finished selecting the
  521.         options you want to install.
  522.  
  523.         @Option 1 = "The JAWS Manual"
  524.         @Option 2 = "JAWS files for use with Word Perfect"
  525.         @Option 3 = "JAWS files for use with Lotus 1-2-3"
  526.         @Option 4 = "JAWS files for use with Professional Write"
  527.         @Option 5 = "JAWS files for use with Procomm Plus"
  528.         @Option 6 = "JAWS files for use with First Choice"
  529.         @Option 7 = "JAWS files for use with FormMate"
  530.         @Option 8 = "JAWS files for use with Arkenstone easy scan"
  531. @EndOption
  532.  
  533. @If (2 [= @Option)
  534.         @GetOption
  535.         @LocalWindow(10,39)
  536.         @CLS
  537.         Which version of Word Perfect are you using?
  538.  
  539.         If you are using Word Perfect 6.0, simply press the Enter
  540.         key.  Otherwise, use the Up Arrow and Down Arrow keys to
  541.         move the bar to the Word Perfect version you use and then
  542.         press the Enter key.
  543.  
  544.         @Option 10 = "Word Perfect Version 6.0"
  545.         @Option 11 = "Word Perfect Version 5.1"
  546.         @Option 12 = "Word Perfect Version 5.0"
  547.         @Option 13 = "Word Perfect Version 4.2"
  548.         @EndOption
  549. @EndIf
  550.  
  551. @DefineVars
  552.         @If (2 [= @Option)
  553.           @If (10 [= @Option)
  554.                 @Qstring @WordPerfect = "Version 6.0"
  555.           @ElseIf (11 [= @Option)
  556.                 @Qstring @WordPerfect = "Version 5.1"
  557.           @ElseIf (12 [= @Option)
  558.                 @Qstring @WordPerfect = "Version 5.0"
  559.           @Else
  560.                 @Qstring @WordPerfect = "Version 4.2"
  561.           @EndIf
  562.         @Else
  563.                 @Qstring @WordPerfect = "Not Installed"
  564.         @EndIf
  565. @EndVars
  566.  
  567. @Display
  568.         @Cls
  569.         You have chosen the following installation selections for JAWS:
  570.  
  571.         Keyboard Type: @Computer
  572.         Disk: @OutDrive:
  573.         @If (@Removable == 0)Directory: @JDir @EndIf
  574.         Synthesizer: @JName
  575.         JAWS Manual:@If (1 [= @Option) Yes @Else No @EndIf
  576.         Word Perfect Support: @WordPerfect
  577.         @If ("Yes" == "@NeedCom")Serial Port: @ComPort @ElseIf ("Yes" == "@NeedLpt")Parallel Printer Port: @LptPort @EndIf
  578.  
  579.         If all this is correct, please press any key to continue.
  580.         Otherwise, press the Escape key followed by the Enter key to
  581.         exit the installation and rerun the program to correct your
  582.         selections.
  583.                                   @Pause
  584. @EndDisplay
  585.  
  586. /* If the register program exists on the first disk, and if there is
  587.  * no preexisting JAWS.JNF file, run the register program  */
  588. @If (@Exists "@InDrive:Register.exe")
  589.         @If (!@Exists "@InDrive:JAWS.JNF")
  590.                 @Spawn("register")
  591.         @EndIf
  592. @EndIf
  593.  
  594. @GetOption
  595. @LocalWindow(11,39)
  596. @Cls
  597.         We need to change the AUTOEXEC.BAT file.  If you are
  598.         installing JAWS for the first time we recommend you let
  599.         JAWS change this file for you.  To do this press the Enter
  600.         key now.  If you already have JAWS running and you do not
  601.         want to change this file, just skip this step by pressing
  602.         the down arrow key then pressing the Enter key.
  603.         @Option 377 = "Change AUTOEXEC.BAT (RECOMMENDED)"
  604.         @Option 378 = "Skip this step for now"
  605. @EndOption
  606.  
  607. @If (377 [= @Option)
  608.      @SetAutoexec
  609.      @OverWrite
  610.      @Path = "@Outdrive:\\@JDir"
  611.      @If (((@OSMajor * 100) + @OSMinor) >= 330)
  612.            @Verbatim "rem Call the JAWS batch file to run JAWS"
  613.            @Verbatim "CALL @OutDrive:\\@JDir\\JAWS.BAT"
  614.      @Else
  615.            @Verbatim "rem Run the JAWS batch file to load JAWS"
  616.            @Verbatim "@OutDrive:\\@JDir\\JAWS.BAT"
  617.      @EndIf
  618.      @EndAutoexec
  619. @Endif
  620.  
  621. /* check the config sys file if necessary */
  622. @If ('A' [= @Group || 'B' [= @Group || 'M' [= @Group )
  623.         @GetOption
  624.         @LocalWindow(11,39)
  625.         @Cls
  626.         We need to change the CONFIG.SYS file.  If you are installing
  627.         JAWS for the first time we recommend you let JAWS change this
  628.         file for you.  To do this press the Enter key now.  If you
  629.         already have JAWS running and you do not want to change this
  630.         file, just skip this step by pressing the down arrow key then
  631.         pressing the Enter key.
  632.               @Option 477 = "Change CONFIG.SYS (RECOMMENDED)"
  633.               @Option 478 = "Skip this step for now"
  634.         @EndOption
  635.  
  636.         @If (477 [= @Option)
  637.            @SetConfig
  638.            @OverWrite
  639.            @If ('A' [= @Group)
  640.                  @Device = "@OutDrive:\\@JDir\\SPKEMS.DVC"
  641.            @ElseIf ('B' [= @Group)
  642.                  @Device = "@OutDrive:\\@JDir\\SPKACNT.DVC"
  643.            @ElseIf ('M' [= @Group)
  644.                  @Device = "@OutDrive:\\@JDir\\SPKMIC.DVC"
  645.            @EndIf
  646.            @EndConfig
  647.         @EndIf
  648. @EndIf
  649.  
  650. @Display
  651.        @Cls
  652.         The Install program is now ready to begin copying files to
  653.         your system.  During this stage the computer will beep when
  654.         it is through with a disk.  When this happens, remove your
  655.         current disk from drive @InDrive, replace it with the next
  656.         numbered disk, press the Enter key and let Install continue.
  657.         If the system beeps again, put the next disk in and repeat
  658.         the procedure.  Install will continue when it has the disk
  659.         it needs.  When you have gone through all the disks in the
  660.         set, return to the first disk.
  661.  
  662.         Press any key now to begin copying the JAWS files.
  663.  
  664.                                    @Pause
  665. @EndDisplay
  666.  
  667.  
  668. /* Install common files */
  669.  
  670. @DefineDisk
  671.     @Label = "JAWS Disk 1"
  672.     @If (@Exists "@InDrive:JAWS.JNF")
  673.                 @File       JAWS.JNF           @Out "JAWS @Version":@JDir\\*.*
  674.     @EndIf
  675.  
  676.     @If (@Exists "@InDrive:Beta.RED")
  677.                 @BeginLib Beta.RED
  678.                        @File     *.*           @Out "JAWS @Version":@JDir\\*.*
  679.                 @EndLib
  680.     @EndIf
  681.  
  682.     @If (@Exists "@InDrive:MANUAL.RED")
  683.         /* Get files from MANUAL.RED if asked for it */
  684.         /* This technique only works on Disk 1! */
  685.         @If (1 [= @Option)
  686.                 @BeginLib MANUAL.RED
  687.                     @If (@Disksize @OutDrive < 720000)
  688.                        @File  *.*      @Out "JAWS Manual":@JDir\\*.*
  689.                     @Else
  690.                        @File  *.*      @Out "JAWS @Version":@JDir\\Manual\*.*
  691.                     @EndIf
  692.                 @EndLib
  693.         @EndIf
  694.     @EndIf
  695.  
  696.     /* End disk 1 if 360k, continue if 720k */
  697.     @If (@Disksize @InDrive < 720000)
  698.         @EndDisk                                 /* end disk 1, if 360K     */
  699.         @DefineDisk
  700.         @Label = "JAWS Disk 2"
  701.  
  702.         /* Get files from MANUAL.RED if asked for it */
  703. //manual no longer on disk 2 of 5.25", now check on disk 5 6/94!
  704. //        @If (1 [= @Option)
  705. //                @BeginLib MANUAL.RED
  706. //                    @If (@Disksize @OutDrive < 720000)
  707. //                       @File  *.*      @Out "JAWS Manual":@JDir\\*.*
  708. //                    @Else
  709. //                       @File  *.*      @Out "JAWS @Version":@JDir\\Manual\*.*
  710. //                    @EndIf
  711. //                @EndLib
  712. //        @EndIf
  713.     @Endif
  714.  
  715.     /* COMMON2 has the rest of the common files, all .EXE's */
  716.     @BeginLib COMMON2.RED
  717.                 @File          *.*      @Out "JAWS @Version":@JDir\\*.*
  718.     @EndLib
  719.  
  720.     /* CMPANION.RED has the files for Application Configurations */
  721.     @BeginLib CMPANION.RED
  722.                 /* Install Lotus 1-2-3 files if selected */
  723.                 @If (3 [= @Option)
  724.                         @File       123.*      @Out "JAWS @Version":@JDir\\*.*
  725.                  @EndIf
  726.                 /* Install Profession Write files if selected */
  727.                 @If (4 [= @Option)
  728.                         @File       PW.*       @Out "JAWS @Version":@JDir\\*.*
  729.                 @EndIf
  730.  
  731.                 /* Install Procomm Plus files if selected */
  732.                 @If (5 [= @Option)
  733.                         @File       PCPLUS.*   @Out "JAWS @Version":@JDir\\*.*
  734.                 @EndIf
  735.  
  736.                 /* Install First Choice files if selected */
  737.                 @If (6 [= @Option)
  738.                         @File       FIRST*.*   @Out "JAWS @Version":@JDir\\*.*
  739.                 @EndIf
  740.  
  741.                 /* Install FormMate files if selected */
  742.                 @If (7 [= @Option)
  743.                         @File       FORMMATE.JMF  @Out "JAWS @Version":@JDir\\*.*
  744.                 @EndIf
  745.  
  746.                 @If (8 [= @Option)
  747.                         @File    SCANALL.JMF   @Out "JAWS @Version":@JDir\\*.*
  748.                         @File    ARKSCAN.JMF   @Out "JAWS @Version":@JDir\\*.*
  749.                         @File    CDP.JMF       @Out "JAWS @Version":@JDir\\*.*
  750.                 @EndIf
  751.  
  752.                 /* Later may change this to be option 9, but for now just do regardless 6/94 */
  753.                         @File    FULLTALK.JEF  @Out "JAWS @Version":@JDir\\*.*
  754.                         @File    JAWSPCB.JMF   @Out "JAWS @Version":@JDir\\*.* 
  755.  
  756.                 @If (301 [= @Option)
  757.                     @If (10 [= @Option)
  758.                         @File    WP60.JFF      @Out "JAWS @Version":@JDir\\WP.JFF
  759.                         @File    WP60.JMF      @Out "JAWS @Version":@JDir\\WP.JMF
  760.                         @File    WP60.JDF      @Out "JAWS @Version":@JDir\\WP.JDF
  761.                         /* Currently no specific configs for Toshiba's for WP 6.0 */
  762.                         @File    WP.JFF        @Out "JAWS @Version":@JDir\\WP51.JFF
  763.                         @File    WP.JEF        @Out "JAWS @Version":@JDir\\WP51.JEF
  764.                         @File    WP51T.JMF     @Out "JAWS @Version":@JDir\\WP51.JMF
  765.                     @Endif
  766.                     /* Install Toshiba Word Perfect 5.1 files if selected */
  767.                     @If (11 [= @Option)
  768.                         @File    WP.JFF        @Out "JAWS @Version":@JDir\\*.*
  769.                         @File    WP.JEF        @Out "JAWS @Version":@JDir\\*.*
  770.                         @File    WP51T.JMF     @Out "JAWS @Version":@JDir\\WP.*
  771.                         @File    WP60.JFF      @Out "JAWS @Version":@JDir\\WP60.JFF
  772.                         @File    WP60.JMF      @Out "JAWS @Version":@JDir\\WP60.JMF
  773.                         @File    WP60.JDF      @Out "JAWS @Version":@JDir\\WP60.JDF
  774.                     @EndIf
  775.                     /* Install Word Perfect 5.0 files if selected */
  776.                     @If (12 [= @Option)
  777.                         @File    WP.JFF       @Out "JAWS @Version":@JDir\\*.*
  778.                         @File    WP.JEF       @Out "JAWS @Version":@JDir\\*.*
  779.                         @File    WP50T.JMF    @Out @JDir\\WP.*
  780.                     @EndIf
  781.                     /* Install Word Perfect 4.2 files if selected */
  782.                     @If (13 [= @Option)
  783.                         @File    WP.JFF       @Out "JAWS @Version":@JDir\\*.*
  784.                         @File    WP.JEF       @Out "JAWS @Version":@JDir\\*.*
  785.                         @File    WP42T.JMF    @Out @JDir\\WP.*
  786.                     @EndIf
  787.                 @Else
  788.                     /* Install Word Perfect 6.0 files if selected */
  789.                     @If (10 [= @Option)
  790.                         @File    WP60.JFF      @Out "JAWS @Version":@JDir\\WP.JFF
  791.                         @File    WP60.JMF      @Out "JAWS @Version":@JDir\\WP.JMF
  792.                         @File    WP60.JDF      @Out "JAWS @Version":@JDir\\WP.JDF
  793.                         @File    WP.JFF        @Out "JAWS @Version":@JDir\\WP51.JFF
  794.                         @File    WP.JEF        @Out "JAWS @Version":@JDir\\WP51.JEF
  795.                         @File    WP51.JMF      @Out "JAWS @Version":@JDir\\WP51.JMF
  796.                     @Endif
  797.                     /* Install Word Perfect 5.1 files if selected */
  798.                     @If (11 [= @Option)
  799.                         @File    WP.JFF        @Out "JAWS @Version":@JDir\\*.*
  800.                         @File    WP.JEF        @Out "JAWS @Version":@JDir\\*.*
  801.                         @File    WP51.JMF      @Out "JAWS @Version":@JDir\\WP.*
  802.                         @File    WP60.JFF      @Out "JAWS @Version":@JDir\\WP60.JFF
  803.                         @File    WP60.JMF      @Out "JAWS @Version":@JDir\\WP60.JMF
  804.                         @File    WP60.JDF      @Out "JAWS @Version":@JDir\\WP60.JDF
  805.                     @EndIf
  806.                     /* Install Word Perfect 5.0 files if selected */
  807.                     @If (12 [= @Option)
  808.                         @File    WP.JFF       @Out "JAWS @Version":@JDir\\*.*
  809.                         @File    WP.JEF       @Out "JAWS @Version":@JDir\\*.*
  810.                         @File    WP50.JMF     @Out @JDir\\WP.*
  811.                     @EndIf
  812.                     /* Install Word Perfect 4.2 files if selected */
  813.                     @If (13 [= @Option)
  814.                         @File    WP.JFF      @Out "JAWS @Version":@JDir\\*.*
  815.                         @File    WP.JEF      @Out "JAWS @Version":@JDir\\*.*
  816.                         @File    WP42.JMF    @Out @JDir\\WP.*
  817.                    @EndIf
  818.                 @EndIf
  819.     @EndLib
  820.  
  821. @If (@Disksize @InDrive < 1440000)
  822. /* Only one disk for High Density 3.5" */
  823. /* End of disk 1 if 720k, End of disk 2 if 360k, no end if 3.5" HD */
  824. @EndDisk
  825.  
  826. /* Now Define disk 2 for 720K or disk 3 and disk 4 for 360K */
  827. @DefineDisk
  828.     @If (@Disksize @InDrive < 720000)
  829.         @Label = "JAWS Disk 3"
  830.     @Else
  831.         @Label = "JAWS Disk 2"
  832.     @EndIf
  833. @EndIf
  834.  
  835.     @If (@Exists "@InDrive:SYNTH1.RED")
  836.         /* Get Files from SYNTH1 if it is on this disk */
  837.         /* This is Disk 1 on 3.5" HD, Disk 2 on 3.5" DD, and Disk 3 on 5.25" DD */
  838.         @BeginLib SYNTH1.RED
  839.                 @If ('P' [= @Group || 'R' [= @Group)
  840.                         @File   J_SB.*          @Out "JAWS @Version":@JDir\\*.*
  841.                 /* Prose 4000 */
  842.                 @ElseIf ('N' [= @Group)
  843.                         @File   J_PROSE.*       @Out "JAWS @Version":@JDir\\*.*
  844.                 @EndIf
  845.         @EndLib
  846.     @EndIf
  847.  
  848.     @BeginLib SYNTH2.RED
  849.                 /* Accent PC and Mini */
  850.                 @If ('A' [= @Group || 'B' [= @Group || 'M' [= @Group )
  851.                         @File   J_ACNTPC.*      @Out "JAWS @Version":@JDir\\*.*
  852.                         // ACNTPC bin file gotten from J_ACCENT.BIN
  853.                         @File   J_ACCENT.BIN    @Out @JDir\\J_ACNTPC.BIN
  854.                 /* Accent SA */
  855.                 @ElseIf ('C' [= @Group)
  856.                         @File   J_ACNTSA.*      @Out "JAWS @Version":@JDir\\*.*
  857.                         // ACNTSA bin file gotten from J_ACCENT.BIN
  858.                         @File   J_ACCENT.BIN    @Out @JDir\\J_ACNTSA.BIN
  859.                 /* Braille N' Speak */
  860.                 @ElseIf ('E' [= @Group || 'Y' [= @Group)
  861.                         @File   J_BNS.*         @Out "JAWS @Version":@JDir\\*.*
  862.                 /* DECtalk, Kurzweil*/
  863.                 @ElseIf ('F' [= @Group)
  864.                         @File   J_DECTLK.*      @Out "JAWS @Version":@JDir\\*.*
  865.                 @ElseIf ('N' [= @Group)
  866.                         @File   J_PROSE.*       @Out "JAWS @Version":@JDir\\*.*
  867.                 @ElseIf ('G' [= @Group)
  868.                         @File   J_DECPC.*       @Out "JAWS @Version":@JDir\\*.*
  869.                 @ElseIf ('S' [= @Group)
  870.                         @File   J_KRE.*         @Out "JAWS @Version":@JDir\\*.*
  871.                         /* Kurzweil reading edge bin file gotten from DECtalk */
  872.                         @File   J_DECTLK.BIN    @Out "JAWS @Version":@JDir\\J_KRE.*
  873.                 @Endif
  874.     @EndLib
  875.  
  876.     /* End this disk(disk 3) if 360k, continue if 720k */
  877.     @If (@Disksize @InDrive < 720000)
  878.         @EndDisk
  879.  
  880.         @DefineDisk
  881.                 @Label = "JAWS Disk 4"
  882.     @EndIf
  883.  
  884.     @BeginLib Synth3.RED
  885.                 /* Double Talk or Lite Talk */
  886.                 @If ( 'H' [= @Group || 'L' [= @Group )
  887.                         @File   J_DOUBLE.*     @Out "JAWS @Version":@JDir\\*.*
  888.                 /* Synphonix and Votalker */
  889.                 @ElseIf ('O' [= @Group || 'Q' [= @Group)
  890.                         @File   J_SONIX.*      @Out "JAWS @Version":@JDir\\*.*
  891.                 /* Audapter */
  892.                 @ElseIf ('D' [= @Group)
  893.                         @File   J_AUDAPT.*     @Out "JAWS @Version":@JDir\\*.*
  894.                 /* Echo PC internal or Echo PC external */
  895.                 @ElseIf ( 'I' [= @Group || 'J' [= @Group)
  896.                         @File   J_ECHO.*       @Out "JAWS @Version":@JDir\\*.*
  897.                 @ElseIf ( 'Z' [= @Group)
  898.                         @File   J_ECHO.BIN     @Out "JAWS @Version":@JDir\\J_ECHOXT.BIN
  899.                         @File   J_ECHOXT.EXE   @Out "JAWS @Version":@JDir\\J_ECHOXT.EXE
  900.                 @EndIf
  901.     @EndLib
  902. @EndDisk
  903. /* End of disk 2 if 720k, end of disk 4 if 360k */
  904.  
  905. @If (@Disksize @InDrive < 720000)
  906.   @DefineDisk
  907.       @Label = "JAWS Disk 5"
  908.       @BeginLib SYNTH1.RED
  909.           @If ('P' [= @Group || 'R' [= @Group)
  910.              @File   J_SB.*          @Out"JAWS @Version":@JDir\\*.*
  911.           /* Prose 4000 */
  912.           @ElseIf ('N' [= @Group)
  913.              @File   J_PROSE.*       @Out "JAWS @Version":@JDir\\*.*
  914.           @EndIf
  915.       @EndLib
  916.     
  917.       /* Get files from MANUAL.RED if asked for it */
  918.       @If (1 [= @Option)
  919.           @BeginLib MANUAL.RED
  920.              @If (@Disksize @OutDrive < 720000)
  921.                  @File  *.*      @Out "JAWS Manual":@JDir\\*.*
  922.              @Else
  923.                  @File  *.*      @Out "JAWS @Version":@JDir\\Manual\*.*
  924.              @EndIf
  925.           @EndLib
  926.        @EndIf
  927.   @EndDisk
  928. @EndIf
  929.  
  930. @DefineDisk
  931.     @Label = "EXTRA SYNTH DISK"
  932.     @BeginLib SYNTH4.RED
  933.         @If ('T' [= @Group )
  934.            @File   J_APOL.BIN      @Out"JAWS @Version":@JDIR\\J_APOLXT.BIN
  935.            @File   J_APOLXT.EXE    @Out"JAWS @Version":@JDIR\\J_APOLXT.EXE
  936.         @ElseIf ('U' [= @Group )
  937.            @File   J_APOL.BIN      @Out"JAWS @Version":@JDIR\\J_APOLPC.BIN
  938.            @File   J_APOLPC.EXE    @Out"JAWS @Version":@JDIR\\J_APOLPC.EXE
  939.         @ElseIf ('V' [= @Group )
  940.            @File   J_VOX.BIN       @Out"JAWS @Version":@JDIR\\J_VOXXT.BIN
  941.            @File   J_VOXXT.EXE     @Out"JAWS @Version":@JDIR\\J_VOXXT.EXE
  942.         @ElseIf ('W' [= @Group )
  943.            @File   J_VOX.BIN       @Out"JAWS @Version":@JDIR\\J_VOXPC.BIN
  944.            @File   J_VOXPC.EXE     @Out"JAWS @Version":@JDIR\\J_VOXPC.EXE
  945.         @ElseIf ('X' [= @Group)
  946.            @File   J_SBLAST.*      @Out "JAWS @Version":@JDir\\*.*
  947.         @EndIf
  948.     @EndLib
  949. @EndDisk
  950.  
  951. /* This forces INSTALL to beep and ask for the first disk
  952.  * otherwise, it won't beep and ask for the first disk to
  953.  * process the @Finish block commands
  954.  */
  955. @DefineDisk
  956.         @Label = "JAWS Disk 1"
  957.  
  958.         @BeginLib COMMON1.RED
  959.                 @File          *.*      @Out "JAWS @Version":@JDir\\*.*
  960.         @EndLib
  961.  
  962.         @If (301 [= @Option)
  963.                 @BeginLib TOSHIBA.RED
  964.                         @File   *.*             @Out "JAWS @Version":@JDir\\*.*
  965.                         @File   JAWSTOSH.JMF    @Out @JDir\\JAWS.*
  966.                 @EndLib
  967.         @EndIf
  968.  
  969. @EndDisk
  970.  
  971. /* At this point, the actual copying will take place */
  972. @Finish
  973.  
  974. /* Copy must be placed in Finish block */
  975. @If (@Removable == 0)                       /* install on hard disk         */
  976.     @Copy( "@InDrive:\\READ.ME", "@OutDrive:\\@JDir\\READ.ME")
  977.     @Copy( "@InDrive:\\J_CVT23.EXE", "@OutDrive:\\@JDir\\J_CVT23.EXE")
  978.     @Copy( "@InDrive:\\*.DOC",   "@OutDrive:\\@JDir\\*.DOC")
  979.     @Copy( "@InDrive:\\*.TXT",   "@OutDrive:\\@JDir\\*.TXT")
  980. @Endif
  981.         /* Create Batch file for Jaws called JAWS.BAT */
  982.         @Cls
  983.         Creating JAWS batch file...
  984.         @If (((@OSMajor * 100) + @OSMinor) < 330)
  985.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "wt", "Echo off\n")
  986.         @Else
  987.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "wt", "@@Echo off\n")
  988.         @EndIf
  989.  
  990.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "REM  Batch file for running JAWS version @Version\n")
  991.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "REM  for the @JName Synthesizer\n")
  992. //      @If (11 [= @Option)
  993. //      Made /ND unconditional (3/94) 
  994.            @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "REM  The following SET command assures the compatibility\n")
  995.            @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "REM  with Word Perfect 5.1 release March 9, 1992 or later\n")
  996.            @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SET wp= %wp% /nd\n")
  997. //      @Endif
  998.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "@Outdrive:\n")
  999.         @If ('R' [= @Group)
  1000.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "MODE @ComPort 96 n 8 1 p\n")
  1001.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "MODE lpt3 = @ComPort\n")
  1002.         @EndIf
  1003.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "CD \\@JDir\n")
  1004.         @If ('P' [= @Group)
  1005.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SBLOAD\n")
  1006.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SB /k0\n")
  1007.         @ElseIf ('I' [= @Group)
  1008.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "If Exist ECHOPCII.com  ECHOPCII\n")
  1009.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "TALK\n")
  1010.         @ElseIf ('O' [= @Group)
  1011.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SONIX\n")
  1012.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "TTS\n")
  1013.         @ElseIf ('L' [= @Group)
  1014.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "MODE @ComPort 96,n,8,1\n")
  1015.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "echo LiteTalk initialized > @ComPort\n")
  1016.         @ElseIf ('Q' [= @Group)
  1017.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "If Exist SONIXTTS.COM Goto SONIXTTS\n")
  1018.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SONIX\n")
  1019.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "TTS\n")
  1020.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "Goto NEXT\n")
  1021.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", ":SONIXTTS\n")
  1022.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SONIXTTS\n")
  1023.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", ":NEXT\n")
  1024.         @ElseIf ('X' [= @Group)
  1025.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "SBLAST.EXE\n"
  1026.         @EndIf
  1027.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "@Exec")
  1028.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " %1 %2 %3 %4 %5 %6 %7 %8 %9")
  1029.         @If ("Yes" == "@NeedCom")
  1030.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /@ComPort")
  1031.         @EndIf
  1032.         @If ("Yes" == "@NeedLpt")
  1033.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /@LptPort")
  1034.         @EndIf
  1035. //made unconditional 6/94        @If (10 [= @Option)
  1036.             @Write("@Outdrive:\\@JDIR\\JAWS.BAT", "at", " /B8")
  1037. //      @EndIf
  1038.         @If (301 [! @Option)
  1039.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /E")
  1040.         @EndIf
  1041.         @If (301 [= @Option)
  1042.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /T")
  1043.         @EndIf
  1044.         @If ('Y' [= @Group)
  1045.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /NI")
  1046.         @EndIf
  1047.         @If ('M' [= @Group)
  1048.             @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", " /Z\"|J\"")
  1049.         @EndIf
  1050.         @Write("@Outdrive:\\@JDir\\JAWS.BAT", "at", "\n")
  1051.  
  1052.         /* Check for JAWS Name File & JAWS Register File */
  1053.         @If (!@Exists "@OutDrive:\\@JDir\\JAWS.JNF")
  1054.         @Cls
  1055.         There is no JAWS name file, JAWS.JNF, in the @OutDrive:@JDir
  1056.         directory.  Therefore your JAWS will act as a demo version,
  1057.         after one thousand key strokes it will pause for five minutes,
  1058.         then give you another five hundred key strokes.  When you re-boot
  1059.         or re-load JAWS it will start over with one thousand keystrokes.
  1060.              @If (!@Exists "@InDrive:Register.exe")
  1061.         If you are updating a previous version of JAWS simply copy
  1062.         the JAWS.JNF file that you have been using into the @OutDrive:@JDir
  1063.         directory.  This will convert JAWS into a real version.  The
  1064.         JAWS.JNF file can be found among the files of your previous JAWS
  1065.         version, or on your original JAWS distribution disk.
  1066.  
  1067.         If you are installing a demonstration of JAWS, and not an update,
  1068.         the name file will not convert it to a live version of JAWS.
  1069.              @Else
  1070.         If you are installing JAWS for the first time you should run the
  1071.         register program to create the JAWS Name File, JAWS.JNF, and then
  1072.         copy it into the specified directory.  This will convert JAWS
  1073.         from a demo version to a real version.  To do this, wait until
  1074.         installation has ended, then type @InDrive: followed by enter, and
  1075.         then type REGISTER followed by enter.  Answer the questions and be
  1076.         prepared to put in the registration disk.  Then copy the JAWS.JNF
  1077.         file to the @OutDrive:@JDir directory.
  1078.  
  1079.         If you have installed JAWS and created the JAWS Name File before
  1080.         then you should get the JAWS.JNF file from the previous
  1081.         installation and copy it into the @OutDrive:@JDir directory.
  1082.              @EndIf
  1083.                                   @Pause
  1084.         @EndIf
  1085.  
  1086.         @If (" " != "@ExtraFiles")
  1087.         @Cls
  1088.         The synthesizer you have chosen, the @JName, comes with a
  1089.         diskette of utility programs.  After the installation process
  1090.         is over, you will need to copy the following file or files
  1091.         from that diskette into @OutDrive:@JDir.
  1092.  
  1093.            @If ('I' [= @Group)
  1094.               If you use EchoPCII echo card
  1095.                  Copy ECHOPCII.com and TALK.exe to @OutDrive:@JDir
  1096.               If you use EchoPC+ echo card
  1097.                  Copy TALK.exe to @OutDrive:@JDir
  1098.            @Else
  1099.               @ExtraFiles
  1100.            @EndIf
  1101.  
  1102.         Make certain that you have installed the software correctly
  1103.         for the @JName synthesizer before running JAWS.  If the
  1104.         appropriate software has already been installed you may ignore
  1105.         this message.
  1106.  
  1107.              @If ('Q' [= @Group)
  1108.         In the case of the Symphonix 215, you may need to order the
  1109.         file SONIXTTS.COM from Artic Technologies.
  1110.  
  1111.              @EndIf
  1112.                                   @Pause
  1113.         @EndIf
  1114.  
  1115.         @Cls
  1116.         @If (@Removable == 0)
  1117.         JAWS is now installed on your system.  To run JAWS, remove
  1118.         all diskettes from the floppy drives and reboot your computer.
  1119.         If JAWS does not run automatically, you must run it manually.
  1120.         To do this, you need to change to your @Outdrive:@JDir directory,
  1121.         and type J A W S then press the Enter key.
  1122.         @Else
  1123.         JAWS is now installed on your system.  To run JAWS, go to
  1124.         your @Outdrive: drive, type J A W S and press the ENTER key.
  1125.         @EndIf
  1126.         If you have any questions about running JAWS, please consult your
  1127.         JAWS training tapes and JAWS manual (available in print, on disk,
  1128.         and in braille), and your @JName manual.
  1129.  
  1130.         If it becomes necessary to call us for technical assistance please
  1131.         be at your computer with it turned on, and have a tape recorder
  1132.         handy to take notes.
  1133.                                   @Pause
  1134.  
  1135.         @Cls
  1136.         @ChDrive @OutDrive
  1137.         @ChDir "@JDir"
  1138. @EndFinish
  1139.